home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 8 / CD Funhouse Version 8.0 - Wayzata Technology (7013) (1993).iso / pc / mac / __cd_fun / __sports / hyperfoo.00 / card_5018.txt < prev    next >
Text File  |  1990-10-03  |  8KB  |  403 lines
  1. -- card: 5018 from stack: in.00
  2. -- bmap block id: 6431
  3. -- flags: 0000
  4. -- background id: 2687
  5. -- name: Offense
  6. ----- HyperTalk script -----
  7.  
  8.  
  9.  
  10.  
  11. -- part 1 (button)
  12. -- low flags: 00
  13. -- high flags: 8004
  14. -- rect: left=388 top=208 right=258 bottom=450
  15. -- title width / last selected line: 0
  16. -- icon id / first selected line: 1897 / 1897
  17. -- text alignment: 1
  18. -- font id: 0
  19. -- text size: 12
  20. -- style flags: 0
  21. -- line height: 16
  22. -- part name: Field Goal
  23. ----- HyperTalk script -----
  24. on mouseUp
  25.   FieldGoal
  26.   Runplay
  27. end mouseUp
  28.  
  29.  
  30.  
  31. -- part 2 (button)
  32. -- low flags: 00
  33. -- high flags: 8004
  34. -- rect: left=100 top=47 right=98 bottom=163
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 15442 / 15442
  37. -- text alignment: 1
  38. -- font id: 0
  39. -- text size: 12
  40. -- style flags: 0
  41. -- line height: 16
  42. -- part name: Draw Play
  43. ----- HyperTalk script -----
  44. on mouseUp
  45.   global players
  46.  
  47.   if players=1 then Computer
  48.   Drawplay
  49.   Runplay
  50. end mouseUp
  51.  
  52.  
  53.  
  54. -- part 4 (button)
  55. -- low flags: 00
  56. -- high flags: 8004
  57. -- rect: left=425 top=269 right=319 bottom=487
  58. -- title width / last selected line: 0
  59. -- icon id / first selected line: 28371 / 28371
  60. -- text alignment: 1
  61. -- font id: 0
  62. -- text size: 12
  63. -- style flags: 0
  64. -- line height: 16
  65. -- part name: Punt
  66. ----- HyperTalk script -----
  67. on mouseUp
  68.   Punt
  69. end mouseUp
  70.  
  71.  
  72.  
  73.  
  74.  
  75. -- part 5 (button)
  76. -- low flags: 00
  77. -- high flags: 8004
  78. -- rect: left=252 top=210 right=260 bottom=316
  79. -- title width / last selected line: 0
  80. -- icon id / first selected line: 10053 / 10053
  81. -- text alignment: 1
  82. -- font id: 0
  83. -- text size: 12
  84. -- style flags: 0
  85. -- line height: 16
  86. -- part name: TE Screen
  87. ----- HyperTalk script -----
  88. on mouseUp
  89.   global players
  90.  
  91.   if players=1 then Computer
  92.   Screenpass
  93.   Runplay
  94. end mouseUp
  95.  
  96.  
  97.  
  98. -- part 6 (button)
  99. -- low flags: 00
  100. -- high flags: 8004
  101. -- rect: left=197 top=270 right=320 bottom=261
  102. -- title width / last selected line: 0
  103. -- icon id / first selected line: 3497 / 3497
  104. -- text alignment: 1
  105. -- font id: 0
  106. -- text size: 12
  107. -- style flags: 0
  108. -- line height: 16
  109. -- part name: Long Pass
  110. ----- HyperTalk script -----
  111. on mouseUp
  112.   global players
  113.  
  114.   if players=1 then Computer
  115.   Longpass
  116.   Runplay
  117. end mouseUp
  118.  
  119.  
  120.  
  121. -- part 7 (button)
  122. -- low flags: 00
  123. -- high flags: 8004
  124. -- rect: left=255 top=47 right=98 bottom=317
  125. -- title width / last selected line: 0
  126. -- icon id / first selected line: 9071 / 9071
  127. -- text alignment: 1
  128. -- font id: 0
  129. -- text size: 12
  130. -- style flags: 0
  131. -- line height: 16
  132. -- part name: Off Tackle
  133. ----- HyperTalk script -----
  134. on mouseUp
  135.   global players
  136.  
  137.   if players=1 then Computer
  138.   OffTackle
  139.   Runplay
  140. end mouseUp
  141.  
  142.  
  143.  
  144. -- part 8 (button)
  145. -- low flags: 00
  146. -- high flags: 8004
  147. -- rect: left=177 top=47 right=98 bottom=239
  148. -- title width / last selected line: 0
  149. -- icon id / first selected line: 19359 / 19359
  150. -- text alignment: 1
  151. -- font id: 0
  152. -- text size: 12
  153. -- style flags: 0
  154. -- line height: 16
  155. -- part name: End Run
  156. ----- HyperTalk script -----
  157. on mouseUp
  158.   global players
  159.  
  160.   if players=1 then Computer
  161.   Endrun
  162.   Runplay
  163. end mouseUp
  164.  
  165.  
  166.  
  167. -- part 9 (button)
  168. -- low flags: 00
  169. -- high flags: 8004
  170. -- rect: left=100 top=210 right=260 bottom=164
  171. -- title width / last selected line: 0
  172. -- icon id / first selected line: 7631 / 7631
  173. -- text alignment: 1
  174. -- font id: 0
  175. -- text size: 12
  176. -- style flags: 0
  177. -- line height: 16
  178. -- part name: Quick Out
  179. ----- HyperTalk script -----
  180. on mouseUp
  181.   global players
  182.  
  183.   if players=1 then Computer
  184.   Quickout
  185.   Runplay
  186. end mouseUp
  187.  
  188.  
  189.  
  190. -- part 11 (button)
  191. -- low flags: 00
  192. -- high flags: 8004
  193. -- rect: left=197 top=108 right=159 bottom=259
  194. -- title width / last selected line: 0
  195. -- icon id / first selected line: 18479 / 18479
  196. -- text alignment: 1
  197. -- font id: 0
  198. -- text size: 12
  199. -- style flags: 0
  200. -- line height: 16
  201. -- part name: Reverse
  202. ----- HyperTalk script -----
  203. on mouseUp
  204.   global players
  205.  
  206.   if players=1 then Computer
  207.   Reverse
  208.   Runplay
  209. end mouseUp
  210.  
  211.  
  212.  
  213. -- part 12 (button)
  214. -- low flags: 00
  215. -- high flags: 8004
  216. -- rect: left=24 top=210 right=260 bottom=88
  217. -- title width / last selected line: 0
  218. -- icon id / first selected line: 24447 / 24447
  219. -- text alignment: 1
  220. -- font id: 0
  221. -- text size: 12
  222. -- style flags: 0
  223. -- line height: 16
  224. -- part name: Short Option
  225. ----- HyperTalk script -----
  226. on mouseUp
  227.   global players
  228.  
  229.   if players=1 then Computer
  230.   Shortpass
  231.   Runplay
  232. end mouseUp
  233.  
  234.  
  235.  
  236. -- part 14 (button)
  237. -- low flags: 00
  238. -- high flags: 8004
  239. -- rect: left=176 top=210 right=261 bottom=238
  240. -- title width / last selected line: 0
  241. -- icon id / first selected line: 10270 / 10270
  242. -- text alignment: 1
  243. -- font id: 0
  244. -- text size: 12
  245. -- style flags: 0
  246. -- line height: 16
  247. -- part name: Slant
  248. ----- HyperTalk script -----
  249. on mouseUp
  250.   global players
  251.  
  252.   if players=1 then Computer
  253.   Slant
  254.   Runplay
  255. end mouseUp
  256.  
  257.  
  258.  
  259. -- part 16 (button)
  260. -- low flags: 00
  261. -- high flags: 8004
  262. -- rect: left=83 top=107 right=158 bottom=145
  263. -- title width / last selected line: 0
  264. -- icon id / first selected line: 14016 / 14016
  265. -- text alignment: 1
  266. -- font id: 0
  267. -- text size: 12
  268. -- style flags: 0
  269. -- line height: 16
  270. -- part name: Sweep
  271. ----- HyperTalk script -----
  272. on mouseUp
  273.   global players
  274.  
  275.   if players=1 then Computer
  276.   Sweep
  277.   Runplay
  278. end mouseUp
  279.  
  280.  
  281.  
  282. -- part 17 (button)
  283. -- low flags: 00
  284. -- high flags: 8004
  285. -- rect: left=26 top=47 right=98 bottom=88
  286. -- title width / last selected line: 0
  287. -- icon id / first selected line: 13921 / 13921
  288. -- text alignment: 1
  289. -- font id: 0
  290. -- text size: 12
  291. -- style flags: 0
  292. -- line height: 16
  293. -- part name: QB Sneak
  294. ----- HyperTalk script -----
  295. on mouseUp
  296.   global players
  297.  
  298.   if players=1 then Computer
  299.   QBSneak
  300.   Runplay
  301. end mouseUp
  302.  
  303.  
  304.  
  305. -- part 18 (button)
  306. -- low flags: 00
  307. -- high flags: 8004
  308. -- rect: left=80 top=271 right=321 bottom=144
  309. -- title width / last selected line: 0
  310. -- icon id / first selected line: 11430 / 11430
  311. -- text alignment: 1
  312. -- font id: 0
  313. -- text size: 12
  314. -- style flags: 0
  315. -- line height: 16
  316. -- part name: Medium In
  317. ----- HyperTalk script -----
  318. on mouseUp
  319.   global players
  320.  
  321.   if players=1 then Computer
  322.   Mediumpass
  323.   Runplay
  324. end mouseUp
  325.  
  326.  
  327.  
  328. -- part 19 (button)
  329. -- low flags: 00
  330. -- high flags: 8004
  331. -- rect: left=351 top=269 right=319 bottom=413
  332. -- title width / last selected line: 0
  333. -- icon id / first selected line: 26934 / 26934
  334. -- text alignment: 1
  335. -- font id: 0
  336. -- text size: 12
  337. -- style flags: 0
  338. -- line height: 16
  339. -- part name: Short Punt
  340. ----- HyperTalk script -----
  341. on mouseUp
  342.   global ty, dwn, dir, fdown, team1, ptime, fdown, yop, ofns, plytyp,mdw
  343.   global play, ds, drop, inc
  344.  
  345.   put "Short Punt" into play
  346.   put 0 into inc
  347.   put 0 into drop
  348.   put 0 into plytyp
  349.   put 1 into ofns
  350.   put 14 into ptime
  351.   put the random of 99 into kick
  352.   put the random of 99 into rtn
  353.   if kick >= 95 and kick <100 then put 51 into ko
  354.   if kick >= 90 and kick <95 then put 46 into ko
  355.   if kick >= 70 and kick <90 then put 39 into ko
  356.   if kick >= 40 and kick <70 then put 31 into ko
  357.   if kick <40 then put 24 into ko
  358.  
  359.   if rtn >= 97 and rtn <100 then put 100 into r
  360.   if rtn >= 94 and rtn <97 then put 30 into r
  361.   if rtn >= 89 and rtn <94 then put 15 into r
  362.   if rtn >= 75 and rtn <89 then put 7 into r
  363.   if rtn >= 65 and rtn <75 then put 9 into r
  364.   if rtn >= 30 and rtn <65 then put 0 into r
  365.   if rtn >= 15 and rtn <30 then put 5 into r
  366.   if rtn <15 then put 0 into r
  367.   go to card 5
  368.   if dir=0 then
  369.     put ty+ko into fty
  370.   else
  371.     put ty-ko into fty
  372.   end if
  373.   XFootball (ty*3)+106,(fty*3)+106
  374.   put fty into ty
  375.  
  376.   put 0 into dwn
  377.   put 0 into mdw
  378.   put r into yop
  379.   if dir=1 then
  380.     if ty+yop<=0 then
  381.       put 19 into ty
  382.       put 1 into yop
  383.       XFootball 19,20
  384.     end if
  385.     put ty+yop+10 into fdown
  386.   else
  387.     if ty-yop>=100 then
  388.       put 81 into ty
  389.       put 1 into yop
  390.       XFootball 81,80
  391.     end if
  392.     put ty-yop-10 into fdown
  393.   end if
  394.   if dir=0 then put 1 into dir
  395.   else put 0 into dir
  396.   if team1 is true then put false into team1
  397.   else put true into team1
  398.  
  399.  
  400.   Runplay
  401. end mouseUp
  402.  
  403.